home *** CD-ROM | disk | FTP | other *** search
/ World of Education / World of Education.iso / world_m / mercuryz.zip / ASINH.C < prev    next >
C/C++ Source or Header  |  1992-03-24  |  482b  |  28 lines
  1.  
  2. /* Asinh.c
  3.  
  4. inverse hyperbolic sine
  5.  
  6. Source to ASINH.BIN.  Rebuild with Borland C++:
  7.  
  8.     bcc -c -mt! asinh
  9.     tlink x02 asinh /t/x/c,asinh.bin,,fp ld
  10.  
  11. If you are using a coprocessor, you can also build with:
  12.  
  13.     bcc -c -mt! asinh
  14.     tlink x01 asinh f87 /t/x/c,asinh.bin,,fp ld
  15.  
  16. With older versions of Borland C++ (Turbo C), compile with:
  17.  
  18.     tcc -c -mt asinh
  19.  
  20. */
  21.  
  22. #include "mathl.h"
  23.  
  24. void pascal xmain(double far *x)
  25. {
  26.     x[0] = logl(x[1] + sqrtl(x[1]*x[1] + 1));
  27. }
  28.